home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / libs / datamaster_lib.lha / Datamaster / Developer / Examples / Asm / recognizers / ANIM-IFF next >
Text File  |  1997-05-01  |  696b  |  44 lines
  1.  
  2.         section "Recognizer",code
  3.  
  4.     incdir "includes:"
  5.     include    "asm:datamaster.library/datamaster.i"
  6.     include    "asm:datamaster.library/datamaster_lib.i"
  7.  
  8.  
  9. CALLBASE:    MACRO
  10.     jsr    _LVO\1(a6)
  11.         ENDM
  12.  
  13. JMPBASE:    MACRO
  14.     jmp    _LVO\1(a6)
  15.         ENDM
  16.  
  17.         RECOHEADER reco
  18. reco:    dc.l    DMR_Check,.check
  19.     dc.l    DMR_Name,.name
  20.     dc.l    DMR_Descr,.descr
  21.     dc.l    DMR_Flags,RECOF_CheckData
  22.     dc.l    DMR_Version,1<<16+1
  23.     dc.l    DMR_Class,DMCLASSF_ANIMATION
  24.     dc.l    TAG_END
  25.  
  26. .check:    lea    .form(pc),a1
  27.     CALLBASE dmCmpTextNC
  28.     tst.l    d0
  29.     bne.s    .err
  30.     lea    8(a2),a0
  31.     lea    .ilbm(pc),a1
  32.     CALLBASE dmCmpTextNC
  33.     tst.l    d0
  34.     rts
  35. .err:    moveq    #1,d0
  36.     rts
  37.     
  38. .name:    dc.b    "ANIM-IFF",0
  39. .descr:    dc.b    "Iff Animation",0
  40. .form:    dc.b    "FORM",0
  41. .ilbm:    dc.b    "ANIM",0
  42.     even    
  43.  
  44.